home *** CD-ROM | disk | FTP | other *** search
/ Aminet 15 / Aminet 15 - Nov 1996.iso / Aminet / dev / misc / memmgrb3.lha / MemManagerBeta3 / m2 / memmanagerL.def
Encoding:
Modula Definition  |  1996-09-23  |  1.0 KB  |  43 lines
  1. DEFINITION MODULE memmanagerL {"memmanager.library",3};
  2.  
  3. (*$ Implementation- *)
  4.  
  5. FROM SYSTEM IMPORT ADDRESS;
  6. IMPORT ed:ExecD,Reg;
  7.  
  8.  
  9. VAR
  10.  memmanagerbase : ed.LibraryPtr;
  11.  
  12.  
  13. CONST
  14.  memmanagerMinVersion=3;
  15.  memmanagerName="memmanager.library";
  16.  
  17.  disposable = 2;
  18.  paged = 4;
  19.  
  20. PROCEDURE CreateVMem(memsize{Reg.D0},memflags{Reg.D1},initpri{Reg.D2},vmemflags{Reg.D3}:LONGINT):ADDRESS; CODE -30;
  21.  
  22. PROCEDURE RemoveVMem(obj{Reg.A1}:ADDRESS); CODE -36;
  23.  
  24. PROCEDURE LockVMem(obj{Reg.A1}:ADDRESS):ADDRESS; CODE -42;
  25.  
  26. PROCEDURE UnlockVMem(obj{Reg.A1}:ADDRESS); CODE -48;
  27.  
  28. PROCEDURE ChangeVMemPri(obj{Reg.A1}:ADDRESS;mempri{Reg.D0}:LONGINT); CODE -54;
  29.  
  30. PROCEDURE PurgeVMem(memflags{Reg.D1}:LONGINT) : LONGINT; CODE -60;
  31.  
  32. PROCEDURE ChangeVMemType(obj{Reg.A1} : ADDRESS; vmemflags{Reg.D0} : LONGINT); CODE -66;
  33.  
  34. PROCEDURE DefineVMemHierachy(hierachy{Reg.A1} : ADDRESS); CODE -72;
  35.  
  36. PROCEDURE ClearVMemHierachy(hierachy{Reg.A1} : ADDRESS); CODE -78;
  37.  
  38. PROCEDURE Publish(obj{Reg.A1} : ADDRESS); CODE -84;
  39.  
  40. PROCEDURE Protect(obj{Reg.A1} : ADDRESS); CODE -90;
  41.  
  42. END memmanagerL.
  43.